home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / Projects / Tutorial Material / Zone Tutorial / Structure Notes / 5. Generated Tonalities < prev    next >
Encoding:
Text File  |  1998-10-26  |  641 b   |  20 lines  |  [TEXT/ScoM]

  1. Software Generated Tonalities
  2.  
  3. Not only can symbol melody create zone length patterns, it can 
  4. initiate tonality itself. In file STRUCT2, an invention for 
  5. solo keyboard, a hopalong generator outputs a symbol pattern 
  6. for each hand and an interval scheme for its tonality. 
  7.  
  8. (gen-hopalong-symbol xmel (a g) ymel (a g) 100 200 300 0.45 32 0)
  9.  
  10. (setq mel1 (find-change xmel))
  11. (setq mel2 (find-change ymel))
  12.  
  13. (gen-hopalong-vector tonx tony 100 200 300 0.45 7 0) 
  14.  
  15. (create-tonality scale1 (vector-to-list (vector-round 1 12 tonx)))
  16. ; -> (10 6 4 12 7 1 12)
  17. (create-tonality scale2 (vector-to-list (vector-round 1 12 tony)))
  18. ; ->(8 3 7 9 1 6 12) 
  19.  
  20.